home *** CD-ROM | disk | FTP | other *** search
- /*
- ** public domain demo by Bob Stout
- */
-
- #define CAST(new_type,old_object) (*((new_type *)&old_object))
-
- #if 0
- *************************************************************************
- * *
- * /* Example of CAST macro at work */ *
- * *
- * union { *
- * char ch[4]; *
- * int i[2]; *
- * } my_union; *
- * *
- * long longvar; *
- * *
- * longvar = (long)my_union; /* Illegal cast */ *
- * longvar = CAST(long, my_union); /* Legal cast */ *
- * *
- *************************************************************************
- #endif /* 0 */
-